#tcp_v4_rcv-tcp_v4_do_rcv
p $tmp=0
while $tmp<$cpu_number
  eval "tvariable $per_cpu_c_%d",$tmp
  eval "tvariable $per_cpu_tmp_0_%d",$tmp
  eval "tvariable $per_cpu_cy1_%d",$tmp
  eval "tvariable $per_cpu_c1_%d",$tmp
  p $tmp=$tmp+1
end


trace tcp_v4_rcv
  commands
    teval $per_cpu_c_0=$per_cpu_c_0+1
    teval $per_cpu_tmp_0_0=$clock
  end

trace tcp_v4_do_rcv if ($per_cpu_c_0>100 && $per_cpu_tmp_0_0 != 0)
  commands
    teval $per_cpu_cy1_0=$clock-$per_cpu_tmp_0_0+$per_cpu_cy1_0
    teval $per_cpu_c1_0=$per_cpu_c1_0+1
    teval $per_cpu_tmp_0_0=0
  end

define showall
p $per_cpu_c1_0
p $per_cpu_cy1_0/$per_cpu_c1_0
end
